home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1995 May / cd Ware (Juegos) Epimundo.iso / DOS / C / DATDISP.ZIP / DEMO.C < prev    next >
Encoding:
C/C++ Source or Header  |  1989-06-30  |  434 b   |  27 lines
  1. #include <stdio.h>
  2.  
  3. struct rt {
  4.     char name [17];
  5.     int age;
  6.     double debt;
  7. } r;
  8.  
  9. main ()
  10. {
  11.     FILE *f;
  12.     
  13.     f = fopen ("DEMODATA", "wb");
  14.     do {
  15.     printf ("Name : ");
  16.     scanf ("%s", r.name);
  17.     printf ("Age  : ");
  18.     scanf ("%d", &r.age);
  19.     printf ("Debt : ");
  20.     scanf ("%le", &r.debt);
  21.     if (r.age != 0) {
  22.         fwrite (&r, sizeof (r), 1, f);
  23.     }
  24.     } while (r.age != 0);
  25.     fclose (f);
  26.     return 0;
  27. }